home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / Mops 2.7 / Mops Manual / Part I.srd / Part I.srd.rsrc / PICT_36.png < prev    next >
Portable Network Graphic  |  1996-01-02  |  120KB  |  816x1056  |  8-bit (256 colors)
Labels: book | reckoner | sky | windowpane
OCR: I-32 Mops Tutorial To draw the objects on the screen, you need to send another message, one that calls upon the draw method of class Rect. The message would be draw box] you were defini ing class Rect from scratch, you could also de fine new the trions C * two me thods into one Then, single message woul Lc T.a Ke care and draw: me thods For thi tO happen, you need way for the -new me thod ods in the same class That where message rece iver called sel f 1 comes new thod (place the lass looks like this: :class RECT super{ ob- ject record po: int TopLe F+ point BotRi ght II PUT: put: BotRi ght put: TopLeft DRAW : addr: self call FrameRect PLACE draw new coordinates put: draw: self ;class The place: me thod contains the messages "put: self" and "draw: self The saying "Do to the current ob ject ...